
*************************************
*K/L does not respond to trade shock*
*************************************
set more off
eststo clear
use temp1,clear
egen naf2yr = group(naf2 year)
global depvar "llaborpty"
global depvar_d1  "llaborpty_d1"
*
eststo: xtreg  linv shock3intens i.naf2yr, robust cluster(firmid) fe i(firmid)
eststo: reg    linv_d1 shock6intens i.naf2yr, robust cluster(firmid)
eststo: xtreg  linv_d1 shock6intens i.naf2yr, robust cluster(firmid)  fe i(firmid)
*
log using $DIRLOG/Replication/tab-KL.txt, text replace
*******************************
*K/L DOES NOT RESPOND TO TRADE*
*******************************
esttab, keep(shock* ) b(%4.3f) se(%4.3f) r2 starlevels({$^c$} 0.1 {$^b$} 0.05 {$^a$} 0.01)  tex  title() label
esttab, keep(shock* ) compress r2 starlevels(c 0.1 b 0.05 a 0.01)  b(%4.3f) se(%4.3f)
*output the results in a tex file directly inputable in the text
esttab using $DIRLOG/Replication/tab-KL_input.tex, b(%4.3f) se(%4.3f)  starlevels({$^c$} 0.1 {$^b$} 0.05 {$^a$} 0.01)    ///
nocons keep(shock*)  label tex substitute(\_ \_)  fragment replace nodepvars nonumbers nomtitles nogaps nolines eqlabels(none)
eststo clear
log close

